perm filename BUG1.LOG[MF,DEK] blob sn#754263 filedate 1984-05-10 generic text, type T, neo UTF8
This is METAFONT, WAITS Version -69.0 (INIMF)  10 MAY 1984 04:44
**bug1
(BUG1.MF[MF,DEK] (FONT1B.MF[TEX,SYS])
{tracingonline:=1}

{if}
{unknown((dx1,dy1))}
{not(true)}
{false}
{if}
{(0.1)<>(0)}
{true}
{((26.98022,-2.73491))-((28.00159,260))}
{(0.1)*((-1.02136,-262.73491))}
{((28.00159,260))+((-0.10214,-26.2751))}
{((42.4909,0))-((43.00159,260))}
{(0.1)*((-0.51068,-260))}
{((43.00159,260))+((-0.05107,-26.00159))}
{((42.95052,233.99841))-((27.89944,233.7249))}
{(0.1)*((15.05107,0.27351))}
{((27.89944,233.7249))+((1.5052,0.02736))}
{((26.98022,-2.73491))-((28.00159,260))}
{fi}
{if}
{unknown((dx2,dy2))}
{not(true)}
{false}
{if}
{unknown((dx2,dy2))}
{not(true)}
{false}
{if}
{(0.1)<>(0)}
{true}
{((58.00159,2.73492))-((58.00159,260))}
{(0.1)*((0,-257.26508))}
{((58.00159,260))+((0,-25.72807))}
{((42.4909,0))-((43.00159,260))}
{(0.1)*((-0.51068,-260))}
{((43.00159,260))+((-0.05107,-26.00159))}
{((42.95052,233.99841))-((58.00159,234.27193))}
{(0)*((-15.05107,-0.27351))}
{((58.00159,234.27193))+((0,0))}
{((58.00159,260))-((58.00159,2.73492))}
{fi}
{if}
{unknown((dx1,dy1))}
{not(true)}
{false}
Path at line 32, before choices:
(28.00159,260){curl 1}
 ..(29.40465,233.75226){-1.02136,-262.73491}
 ..(26.98022,-2.73491){curl 1}
 ..(58.00159,2.73492){curl 1}
 ..(58.00159,234.27193){0,257.26508}
 ..(58.00159,260){curl 1}
 ..cycle

Path at line 32, after choices:
(28.00159,260)..controls (28.97028,251.28473) and (29.43874,242.52112)
 ..(29.40465,233.75226)..controls (29.09819,154.91885) and (28.29004,76.08821)
 ..(26.98022,-2.73491)..controls (37.32068,-0.91164) and (47.66113,0.91165)
 ..(58.00159,2.73492)..controls (58.00159,79.91393) and (58.00159,157.09293)
 ..(58.00159,234.27193)..controls (58.00159,242.84795) and (58.00159,251.42398)
 ..(58.00159,260)..controls (48.0016,260) and (38.00157,260)
 ..cycle

{addto}
Tracing edges at line 32: (weight 1)
(28,260)(28,253)(29,253)(29,140)(28,140)(28,37)(27,37)(27,-3)(28,-3)
(28,-2)(34,-2)(34,-1)(40,-1)(40,0)(45,0)(45,1)(51,1)(51,2)(57,2)(57,3)
(58,3)(58,260).

{display}
>> stop
! Isolated expression.
char.P->...:=1;stroke(1,2,0.1,0.1,0);stop;
                                          stroke(3,4,0,0,0);stop;curv...
test->...=0;init(SUFFIX2)(2);clear;(TEXT3)
                                          ;str(SUFFIX2);shipit;fi;end...
l.32 test.normal(char.P)
                        ;
? 
{if}
{unknown((dx3,dy3))}
{not(true)}
{false}
{if}
{(0)<>(0)}
{false}
{if}
{unknown((dx4,dy4))}
{not(true)}
{false}
{if}
{unknown((dx4,dy4))}
{not(true)}
{false}
{if}
{(0)<>(0)}
{false}
{if}
{unknown((dx3,dy3))}
{not(true)}
{false}
Path at line 32, before choices:
(58.00159,260){curl 1}
 ..(33.46819,250.54292){curl 1}
 ..(26.53181,224.65604){curl 1}
 ..(58.00159,230){curl 1}
 ..cycle

Path at line 32, after choices:
(58.00159,260)..controls (49.82379,256.84766) and (41.64598,253.69527)
 ..(33.46819,250.54292)..controls (31.15607,241.91397) and (28.84393,233.28499)
 ..(26.53181,224.65604)..controls (37.02174,226.43736) and (47.51166,228.21867)
 ..(58.00159,230)..controls (58.00159,240) and (58.00159,250)
 ..cycle

{addto}
Tracing edges at line 32: (weight 1)
(56,260)(56,259)(54,259)(54,258)(52,258)(52,257)(49,257)(49,256)(46,256)
(46,255)(44,255)(44,254)(41,254)(41,253)(39,253)(39,252)(36,252)(36,251)
(33,251)(33,247)(32,247)(32,243)(31,243)(31,239)(30,239)(30,236)(29,236)
(29,232)(28,232)(28,228)(27,228)(27,225)(32,225)(32,226)(37,226)(37,227)
(43,227)(43,228)(49,228)(49,229)(55,229)(55,230)(58,230)(58,260).

{display}
>> stop
! Isolated expression.
char.P->...0);stop;stroke(3,4,0,0,0);stop;
                                          curve(4,5,6);curve(6,7,8);s...
test->...=0;init(SUFFIX2)(2);clear;(TEXT3)
                                          ;str(SUFFIX2);shipit;fi;end...
l.32 test.normal(char.P)
                        ;
? 
{if}
{unknown((dx4,dy4))}
{not(true)}
{false}
{if}
{unknown((dx5,dy5))}
{true}
{else}
{((16.99841,170.99945))-((33.46819,250.54292))}
{if}
{unknown((dx6,dy6))}
{not(true)}
{false}
{if}
{unknown((dx6,dy6))}
{not(true)}
{false}
{if}
{unknown((dx5,dy5))}
{true}
{else}
{((26.53181,224.65604))-((-13.00159,170.99945))}
{if}
{unknown((dx4,dy4))}
{not(true)}
{false}
Path at line 32, before choices:
(33.46819,250.54292){curl 1}
 ..(19.0892,207.28093){-16.46977,-79.54347}
 ..(16.99841,170.99945){curl 1}
 ..(-13.00159,170.99945){curl 1}
 ..(-3.8919,187.99718){39.5334,53.65659}
 ..(26.53181,224.65604){curl 1}
 ..cycle

Path at line 32, after choices:
(33.46819,250.54292)..controls (27.00653,236.73152) and (22.18083,222.21242)
 ..(19.0892,207.28093)..controls (16.61983,195.35468) and (15.91537,183.13042)
 ..(16.99841,170.99945)..controls (6.99843,170.99945) and (-3.0016,170.99945)
 ..(-13.00159,170.99945)..controls (-10.79227,177.07129) and (-7.72455,182.7953
3)
 ..(-3.8919,187.99718)..controls (5.5353,200.79219) and (15.69344,213.0322)
 ..(26.53181,224.65604)..controls (28.84393,233.285) and (31.15607,241.91396)
 ..cycle

{addto}
! Strange path (winding number is zero).
<recently read> ;
                 
curve->...&z(SUFFIX0)r..z(SUFFIX0)l&cycle;
                                          showit;
char.P->...ke(3,4,0,0,0);stop;curve(4,5,6)
                                          ;curve(6,7,8);stroke(8,9,0....
test->...=0;init(SUFFIX2)(2);clear;(TEXT3)
                                          ;str(SUFFIX2);shipit;fi;end...
l.32 test.normal(char.P)
                        ;
? 
Tracing edges at line 32: (weight 1)
(33,251)(33,248)(32,248)(32,246)(31,246)(31,244)(30,244)(30,241)(29,241)
(29,239)(28,239)(28,236)(27,236)(27,233)(26,233)(26,230)(25,230)(25,227)
(24,227)(24,224)(23,224)(23,220)(22,220)(22,216)(21,216)(21,212)(20,212)
(20,207)(19,207)(19,202)(18,202)(18,193)(17,193)(17,171)(-13,171)(-13,173)
(-12,173)(-12,175)(-11,175)(-11,177)(-10,177)(-10,179)(-9,179)(-9,181)
(-8,181)(-8,183)(-7,183)(-7,184)(-6,184)(-6,186)(-5,186)(-5,187)(-4,187)
(-4,189)(-3,189)(-3,190)(-2,190)(-2,191)(-1,191)(-1,193)(0,193)(0,194)
(1,194)(1,195)(2,195)(2,196)(3,196)(3,198)(4,198)(4,199)(5,199)(5,200)
(6,200)(6,202)(7,202)(7,203)(8,203)(8,204)(9,204)(9,205)(10,205)(10,206)
(11,206)(11,208)(12,208)(12,209)(13,209)(13,210)(14,210)(14,211)(15,211)
(15,212)(16,212)(16,213)(17,213)(17,215)(18,215)(18,216)(19,216)(19,217)
(20,217)(20,218)(21,218)(21,219)(22,219)(22,220)(23,220)(23,221)(24,221)
(24,222)(25,222)(25,224)(26,224)(26,226)(27,226)(27,228)(28,228)(28,232)
(29,232)(29,236)(30,236)(30,239)(31,239)(31,243)(32,243)(32,247)(33,247)
(33,251).

{display}
{if}
{unknown((dx6,dy6))}
{not(true)}
{false}
{if}
{unknown((dx7,dy7))}
{true}
{else}
{((34.98694,746.38776))-((16.99841,170.99945))}
{if}
{unknown((dx8,dy8))}
{not(true)}
{false}
{if}
{unknown((dx8,dy8))}
{not(true)}
{false}
{if}
{unknown((dx7,dy7))}
{true}
{else}
{((-13.00159,170.99945))-((25.01305,767.77667))}
{if}
{unknown((dx6,dy6))}
{not(true)}
{false}
Path at line 32, before choices:
(16.99841,170.99945){curl 1}
 ..(19.89626,398.32898){17.98853,575.3883}
 ..(34.98694,746.38776){curl 1}
 ..(25.01305,767.77667){curl 1}
 ..(-4.69896,412.52899){-38.01463,-596.77722}
 ..(-13.00159,170.99945){curl 1}
 ..cycle

Path at line 32, after choices:
(16.99841,170.99945)..controls (16.56187,246.78735) and (17.528,322.57683)
 ..(19.89626,398.32898)..controls (23.52518,514.40509) and (28.55577,630.43314)
 ..(34.98694,746.38776)..controls (31.66232,753.5174) and (28.33766,760.64703)
 ..(25.01305,767.77667)..controls (12.76184,649.56882) and (2.85588,531.12964)
 ..(-4.69896,412.52899)..controls (-9.82117,332.11732) and (-12.5899,251.57303)
 ..(-13.00159,170.99945)..controls (-3.00159,170.99945) and (6.99841,170.99945)
 ..cycle

{addto}
Tracing edges at line 32: (weight 1)
(17,171)(17,285)(18,285)(18,343)(19,343)(19,382)(20,382)(20,415)(21,415)
(21,445)(22,445)(22,473)(23,473)(23,500)(24,500)(24,526)(25,526)(25,550)
(26,550)(26,574)(27,574)(27,597)(28,597)(28,619)(29,619)(29,640)(30,640)
(30,660)(31,660)(31,680)(32,680)(32,700)(33,700)(33,719)(34,719)(34,738)
(35,738)(35,748)(34,748)(34,750)(33,750)(33,752)(32,752)(32,754)(31,754)
(31,756)(30,756)(30,758)(29,758)(29,760)(28,760)(28,762)(27,762)(27,765)
(26,765)(26,767)(25,767)(25,768)(25,763)(24,763)(24,753)(23,753)(23,743)
(22,743)(22,733)(21,733)(21,723)(20,723)(20,713)(19,713)(19,703)(18,703)
(18,692)(17,692)(17,682)(16,682)(16,671)(15,671)(15,660)(14,660)(14,649)
(13,649)(13,638)(12,638)(12,627)(11,627)(11,615)(10,615)(10,603)(9,603)
(9,592)(8,592)(8,580)(7,580)(7,567)(6,567)(6,555)(5,555)(5,542)(4,542)
(4,529)(3,529)(3,516)(2,516)(2,503)(1,503)(1,489)(0,489)(0,475)(-1,475)
(-1,461)(-2,461)(-2,446)(-3,446)(-3,431)(-4,431)(-4,416)(-5,416)(-5,400)
(-6,400)(-6,383)(-7,383)(-7,364)(-8,364)(-8,344)(-9,344)(-9,321)(-10,321)
(-10,295)(-11,295)(-11,263)(-12,263)(-12,218)(-13,218)(-13,171).

{display}
{if}
{unknown((dx8,dy8))}
{not(true)}
{false}
{if}
{(0.2)<>(0)}
{true}
{((58.00159,825.9989))-((34.98694,746.38776))}
{(0.2)*((23.01465,79.61115))}
{((34.98694,746.38776))+((4.60286,15.92198))}
{((58.00159,836.9989))-((30,757.08221))}
{(0.2)*((28.00159,79.91669))}
{((30,757.08221))+((5.60023,15.9831))}
{((35.60023,773.0653))-((39.5898,762.30974))}
{(0)*((-3.98956,10.75557))}
{((39.5898,762.30974))+((0,0))}
{((58.00159,825.9989))-((34.98694,746.38776))}
{fi}
{if}
{unknown((-1,-0.1))}
{not(false)}
{true}
{fi}
{if}
{unknown((-1,-0.1))}
{not(false)}
{true}
{-((-1,-0.1))}
{fi}
{if}
{(0.2)<>(0)}
{true}
{((58.00159,847.9989))-((25.01305,767.77667))}
{(0.2)*((32.98854,80.22223))}
{((25.01305,767.77667))+((6.59761,16.0442))}
{((58.00159,836.9989))-((30,757.08221))}
{(0.2)*((28.00159,79.91669))}
{((30,757.08221))+((5.60023,15.9831))}
{((35.60023,773.0653))-((31.61066,783.82088))}
{(0.2)*((3.98958,-10.75557))}
{((31.61066,783.82088))+((0.7979,-2.15108))}
{((25.01305,767.77667))-((58.00159,847.9989))}
{fi}
{if}
{unknown((dx8,dy8))}
{not(true)}
{false}
Path at line 32, before choices:
(34.98694,746.38776){curl 1}
 ..(39.5898,762.30974){23.01465,79.61115}
 ..(58.00159,825.9989){-1,-0.1}&(58.00159,825.9989){curl 1}
 ..(58.00159,847.9989){curl 1}&(58.00159,847.9989){1,0.1}
 ..(32.40855,781.6698){-32.98854,-80.22223}
 ..(25.01305,767.77667){curl 1}
 ..cycle

Path at line 32, after choices:
(34.98694,746.38776)..controls (36.52122,751.69508) and (38.05551,757.00241)
 ..(39.5898,762.30974)..controls (47.47157,789.57394) and (98.16824,830.01544)
 ..(58.00159,825.9989)..controls (58.00159,833.33223) and (58.00159,840.66557)
 ..(58.00159,847.9989)..controls (102.07956,852.40738) and (44.49153,811.05344)
 ..(32.40855,781.6698)..controls (30.40842,776.80582) and (27.93114,772.15202)
 ..(25.01305,767.77667)..controls (28.33768,760.64705) and (31.66231,753.51738)
 ..cycle

{addto}
! Strange path (winding number is zero).
<recently read> ;
                 
stroke->...z(SUFFIX0)r..z(SUFFIX0)l&cycle;
                                          showit;
char.P->...ve(6,7,8);stroke(8,9,0.2,0,0.2)
                                          ;labelpos(1,2,3,4,5,6,7,8,9);
test->...=0;init(SUFFIX2)(2);clear;(TEXT3)
                                          ;str(SUFFIX2);shipit;fi;end...
l.32 test.normal(char.P)
                        ;
? 
Tracing edges at line 32: (weight 1)
(35,746)(35,749)(36,749)(36,752)(37,752)(37,755)(38,755)(38,759)(39,759)
(39,762)(40,762)(40,765)(41,765)(41,768)(42,768)(42,770)(43,770)(43,772)
(44,772)(44,774)(45,774)(45,775)(46,775)(46,777)(47,777)(47,779)(48,779)
(48,780)(49,780)(49,782)(50,782)(50,783)(51,783)(51,785)(52,785)(52,786)
(53,786)(53,788)(54,788)(54,789)(55,789)(55,790)(56,790)(56,792)(57,792)
(57,793)(58,793)(58,794)(59,794)(59,796)(60,796)(60,797)(61,797)(61,799)
(62,799)(62,800)(63,800)(63,801)(64,801)(64,803)(65,803)(65,804)(66,804)
(66,806)(67,806)(67,807)(68,807)(68,809)(69,809)(69,811)(70,811)(70,813)
(71,813)(71,815)(72,815)(72,817)(73,817)(73,823)(72,823)(72,824)(71,824)
(71,825)(68,825)(68,826)(58,826)(58,848)(70,848)(70,847)(73,847)(73,846)
(74,846)(74,840)(73,840)(73,838)(72,838)(72,836)(71,836)(71,834)(70,834)
(70,832)(69,832)(69,831)(68,831)(68,830)(67,830)(67,828)(66,828)(66,827)
(65,827)(65,826)(64,826)(64,824)(63,824)(63,823)(62,823)(62,822)(61,822)
(61,821)(60,821)(60,819)(59,819)(59,818)(58,818)(58,817)(57,817)(57,816)
(56,816)(56,815)(55,815)(55,814)(54,814)(54,812)(53,812)(53,811)(52,811)
(52,810)(51,810)(51,809)(50,809)(50,808)(49,808)(49,806)(48,806)(48,805)
(47,805)(47,804)(46,804)(46,803)(45,803)(45,801)(44,801)(44,800)(43,800)
(43,799)(42,799)(42,797)(41,797)(41,796)(40,796)(40,794)(39,794)(39,793)
(38,793)(38,791)(37,791)(37,790)(36,790)(36,788)(35,788)(35,786)(34,786)
(34,784)(33,784)(33,782)(32,782)(32,780)(31,780)(31,777)(30,777)(30,775)
(29,775)(29,774)(28,774)(28,772)(27,772)(27,770)(26,770)(26,769)(25,769)
(25,767)(26,767)(26,765)(27,765)(27,762)(28,762)(28,760)(29,760)(29,758)
(30,758)(30,756)(31,756)(31,754)(32,754)(32,752)(33,752)(33,750)(34,750)
(34,748)(35,748)(35,746).

{display}
{if}
{(1)>(0)}
{true}
{forsuffixes}
{loop value=1}
{forsuffixes}
{loop value=1l}
{if}
{unknown((28.00159,260))}
{not(false)}
{true}
{special}
{(" 5")&("1l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=1r}
{if}
{unknown((58.00159,260))}
{not(false)}
{true}
{special}
{(" 5")&("1r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=1}
{if}
{unknown((43.00159,260))}
{not(false)}
{true}
{special}
{(" 5")&("1")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=2}
{forsuffixes}
{loop value=2l}
{if}
{unknown((26.98022,-2.73491))}
{not(false)}
{true}
{special}
{(" 5")&("2l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=2r}
{if}
{unknown((58.00159,2.73492))}
{not(false)}
{true}
{special}
{(" 5")&("2r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=2}
{if}
{unknown((42.4909,0))}
{not(false)}
{true}
{special}
{(" 5")&("2")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=3}
{forsuffixes}
{loop value=3l}
{if}
{unknown((58.00159,260))}
{not(false)}
{true}
{special}
{(" 5")&("3l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=3r}
{if}
{unknown((58.00159,230))}
{not(false)}
{true}
{special}
{(" 5")&("3r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=3}
{if}
{unknown((58.00159,245))}
{not(false)}
{true}
{special}
{(" 5")&("3")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=4}
{forsuffixes}
{loop value=4l}
{if}
{unknown((33.46819,250.54292))}
{not(false)}
{true}
{special}
{(" 5")&("4l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=4r}
{if}
{unknown((26.53181,224.65604))}
{not(false)}
{true}
{special}
{(" 5")&("4r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=4}
{if}
{unknown((30,237.59949))}
{not(false)}
{true}
{special}
{(" 5")&("4")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=5}
{forsuffixes}
{loop value=5l}
{if}
{unknown((19.0892,207.28093))}
{not(false)}
{true}
{special}
{(" 5")&("5l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=5r}
{if}
{unknown((-3.8919,187.99718))}
{not(false)}
{true}
{special}
{(" 5")&("5r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=5}
{if}
{unknown((7.59865,197.63905))}
{not(false)}
{true}
{special}
{(" 5")&("5")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=6}
{forsuffixes}
{loop value=6l}
{if}
{unknown((16.99841,170.99945))}
{not(false)}
{true}
{special}
{(" 5")&("6l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=6r}
{if}
{unknown((-13.00159,170.99945))}
{not(false)}
{true}
{special}
{(" 5")&("6r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=6}
{if}
{unknown((1.99841,170.99945))}
{not(false)}
{true}
{special}
{(" 5")&("6")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=7}
{forsuffixes}
{loop value=7l}
{if}
{unknown((19.89626,398.32898))}
{not(false)}
{true}
{special}
{(" 5")&("7l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=7r}
{if}
{unknown((-4.69896,412.52899))}
{not(false)}
{true}
{special}
{(" 5")&("7r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=7}
{if}
{unknown((7.59865,405.42899))}
{not(false)}
{true}
{special}
{(" 5")&("7")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=8}
{forsuffixes}
{loop value=8l}
{if}
{unknown((34.98694,746.38776))}
{not(false)}
{true}
{special}
{(" 5")&("8l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=8r}
{if}
{unknown((25.01305,767.77667))}
{not(false)}
{true}
{special}
{(" 5")&("8r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=8}
{if}
{unknown((30,757.08221))}
{not(false)}
{true}
{special}
{(" 5")&("8")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{loop value=9}
{forsuffixes}
{loop value=9l}
{if}
{unknown((58.00159,825.9989))}
{not(false)}
{true}
{special}
{(" 5")&("9l")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=9r}
{if}
{unknown((58.00159,847.9989))}
{not(false)}
{true}
{special}
{(" 5")&("9r")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{loop value=9}
{if}
{unknown((58.00159,836.9989))}
{not(false)}
{true}
{special}
{(" 5")&("9")}
{numspecial}
{numspecial}
{fi}
{[repeat the loop]}
{\}
{[repeat the loop]}
{fi}
{if}
{(1)>(0)}
{true}
{shipout}
{fi}
{fi}
{endgroup}
Output written on BUG1.GF[MF,DEK] (1 character, 2744 bytes).